home *** CD-ROM | disk | FTP | other *** search
- /*
- -- ANSI C code generated by :
- -- SmallEiffel The GNU Eiffel Compiler -- Release (- 0.82) --
- -- Copyright (C), 1994-98 - LORIA - UHP - CRIN - INRIA - FRANCE --
- -- Dominique COLNET and Suzanne COLLIN - colnet@loria.fr --
- -- http://www.loria.fr/SmallEiffel --
- */
-
- #include <stdio.h>
- #include <string.h>
- #include <math.h>
- #include <stdlib.h>
- #include <signal.h>
- #include <stddef.h>
- #include <stdarg.h>
- #include <limits.h>
- #include <float.h>
- #include <setjmp.h>
- #include <sys/types.h>
- #include <sys/stat.h>
- #include <fcntl.h>
- #ifndef O_RDONLY
- #include <sys/file.h>
- #endif
- #ifndef O_RDONLY
- #define O_RDONLY 0000
- #endif
- typedef struct S0 T0;
- struct S0{int id;};
- #define INTEGERid 2
- #define CHARACTERid 3
- #define REALid 4
- #define DOUBLEid 5
- #define BOOLEANid 6
- #define POINTERid 8
- #define expandedid 10
- #define REFid 11
- #define LINKid 12
- #define FTAGid 13
- #define NAMEid 14
- #define COLUMNid 15
- #define LINEid 16
- #define PATHid 17
- #define DOINGid 18
- #define INVid 19
- #define BITid 20
-
- /* --- Mangling Table Start ---
- A*1 T7 R STRING 7
- A*1 T675 R STD_FILE_READ 675
- A*1 T676 R PARSER_BUFFER 676
- A*1 T441 R STD_ERROR 441
- A 1 T2 E INTEGER 2
- A 1 T6 E BOOLEAN 6
- A*1 T830 R STD_OUTPUT 830
- A 1 T400 E NATIVE_ARRAY[STRING] 400
- A*1 T604 R SMALL_EIFFEL 604
- A 1 T919 E MEMORY 919
- A*1 T479 R BOOLEAN_REF 479
- A 1 T3 E CHARACTER 3
- A*1 T226 R FIXED_ARRAY[INTEGER] 226
- A 1 T9 E NATIVE_ARRAY[CHARACTER] 9
- A*1 T794 R DICTIONARY[STRING,STRING] 794
- A 1 T670 E FILE_TOOLS 670
- A 1 T686 E NATIVE_ARRAY[INTEGER] 686
- A*1 T306 R ECHO 306
- A*1 T429 R ARRAY[INTEGER] 429
- A*1 T927 R FIXED_ARRAY[STRING] 927
- A*1 T52 R ARRAY[STRING] 52
- A 1 T8 E POINTER 8
- A*1 T829 R FINDER 829
- --- Mangling Table End --- */
-
- /*C Header Pass 1 :*/
- typedef struct S7 T7;
- typedef struct S675 T675;
- typedef struct S676 T676;
- typedef void*T441;
- typedef int T2;
- typedef int T6;
- typedef void*T830;
- typedef void*T604;
- typedef int T919;
- typedef struct S479 T479;
- typedef char T3;
- typedef struct S226 T226;
- typedef struct S794 T794;
- typedef int T670;
- typedef struct S306 T306;
- typedef struct S429 T429;
- typedef struct S927 T927;
- typedef struct S52 T52;
- typedef void* T8;
- typedef void*T829;
-
- /*C Header Pass 2 :*/
- typedef T0**T400;
- typedef T3*T9;
- typedef T2*T686;
-
- /*C Header Pass 3 :*/
-
- /*C Header Pass 4 :*/
- struct S7{T9 _storage;int _count;int _capacity;};
- extern T7 M7;
- struct S675{int _push_back_flag;T0* _path;void* _input_stream;int _memory;};
- extern T675 M675;
- struct S676{T0* _path;int _count;};
- extern T676 M676;
- extern T441 M441;
- extern T830 M830;
- extern T604 M604;
- extern T919 M919;
- struct S479{int _item;};
- extern T479 M479;
- struct S226{T686 _storage;int _capacity;int _upper;};
- extern T226 M226;
- struct S794{T0* _keys;T0* _store;T0* _buckets;T0* _chain;int _free;int _modulus;int _has_mem;int _item_mem;int _count;};
- extern T794 M794;
- extern T670 M670;
- struct S306{int _verbose;};
- extern T306 M306;
- struct S429{T686 _storage;int _capacity;int _upper;int _lower;};
- extern T429 M429;
- struct S927{T400 _storage;int _capacity;int _upper;};
- extern T927 M927;
- struct S52{T400 _storage;int _capacity;int _upper;int _lower;};
- extern T52 M52;
- extern T829 M829;
- int r2min(int C,int a1);
- int r2max(int C,int a1);
- int r6_ix_not(int C);
- int r3is_separator(char C);
- char r3to_lower(char C);
- int r3is_digit(char C);
- char r3to_upper(char C);
- int r3is_letter(char C);
- void r400set_all_with(T400 C,T0* a1,int a2);
- void r400copy_from(T400 C,T400 a1,int a2);
- T400 r400realloc(T400 C,int a1,int a2);
- int r400equal_like(T0* a1,T0* a2);
- int r400index_of(T400 C,T0* a1,int a2);
- int r9hashcode(T9 C,int a1);
- int r9fast_memcmp(T9 C,T9 a1,int a2);
- int r9fast_index_of(T9 C,char a1,int a2);
- void r9copy_from(T9 C,T9 a1,int a2);
- T9 r9realloc(T9 C,int a1,int a2);
- void r686clear_all(T686 C,int a1);
- void r686set_all_with(T686 C,int a1,int a2);
- void r686copy_from(T686 C,T686 a1,int a2);
- void r7extend(T7* C,char a1);
- void r7set_last(T7* C,char a1);
- void r7to_lower(T7* C);
- int r7hash_code(T7* C);
- void r7make(T7* C,int a1);
- void* r7to_external(T7* C);
- int r7is_equal(T7* C,T0* a1);
- T0* r7twin(T7* C);
- char r7last(T7* C);
- int r7has_suffix(T7* C,T0* a1);
- int r7has(T7* C,char a1);
- void r7copy(T7* C,T0* a1);
- void r7prepend(T7* C,T0* a1);
- void r7to_upper(T7* C);
- void r7remove_last(T7* C,int a1);
- int r7index_of(T7* C,char a1);
- void r7append(T7* C,T0* a1);
- void r226make(T226* C,int a1);
- void r226copy(T226* C,T0* a1);
- void r226with_capacity(T226* C,int a1);
- void r429make(T429* C,int a1,int a2);
- int r429item(T429* C,int a1);
- void r429resize(T429* C,int a1,int a2);
- int r429count(T429* C);
- void r927make(T927* C,int a1);
- void r927with_capacity(T927* C,int a1);
- void r927add_last(T927* C,T0* a1);
- void r52make(T52* C,int a1,int a2);
- T0* r52item(T52* C,int a1);
- void r52resize(T52* C,int a1,int a2);
- void r52clear(T52* C);
- int r52count(T52* C);
- void r52add_last(T52* C,T0* a1);
- int r52index_of(T52* C,T0* a1);
- T0* r794at(T794* C,T0* a1);
- void r794expand(T794* C);
- extern T0*oBC672tmp_buckets;
- void r794make(T794* C);
- void r794resize(T794* C,int a1);
- int r794has(T794* C,T0* a1);
- void r794put(T794* C,T0* a1,T0* a2);
- void r794initialize(T794* C);
- void r675connect_to(T675* C,T0* a1);
- extern T0*oBC762last_string;
- void r675skip_separators(T675* C);
- void r675disconnect(T675* C);
- void r675read_character(T675* C);
- void r675read_word(T675* C);
- void r675read_line_in(T675* C,T0* a1);
- int r675end_of_input(T675* C);
- void r675read_line(T675* C);
- extern int fBC676buffer;
- extern T9 oBC676buffer;
- T9 r676buffer(void);
- int r676read_file(T0* a1);
- void r676load_file(T676* C,T0* a1);
- extern T0*oBC676text;
- T0* r676next_line(int a1);
- void r441put_string(T441* C,T0* a1);
- extern T0*oBC817tmp_file_read;
- void r830append_file(T830* C,T0* a1);
- void r830put_string(T830* C,T0* a1);
- extern T0*oBC364tmp_file_read;
- extern int fBC604loading_path;
- extern T0*oBC604loading_path;
- T0* r604loading_path(T604* C);
- extern int fBC364small_eiffel_directory;
- extern T0*oBC364small_eiffel_directory;
- T0* r604small_eiffel_directory(T604* C);
- extern T0*oBC604tmp_tail;
- extern T0*oBC364parser_buffer;
- void r604add_directory(T604* C,T0* a1,T0* a2);
- extern T0*oBC604parser_buffer_path;
- extern T0*oBC364echo;
- T0* r604get_environment_variable(T604* C,T0* a1);
- extern T0*oBC364system_list;
- extern int fBC364system_name;
- extern T0*oBC364system_name;
- T0* r604system_name(T604* C);
- int r604parser_buffer_for(T604* C,T0* a1);
- extern T0*oBC364tmp_path;
- T0* r604find_path_for(T604* C,T0* a1);
- extern int fBC604rename_dictionary;
- extern T0*oBC604rename_dictionary;
- T0* r604rename_dictionary(T604* C);
- void r604append_loading_path_in(T604* C,T0* a1);
- extern T0*oBC670std_fr1;
- int r670is_readable(T0* a1);
- extern T0*oBC1std_error;
- extern T0*oBC1std_output;
- void r306sfr_connect(T306* C,T0* a1,T0* a2);
- void r306put_string(T306* C,T0* a1);
- void r306w_put_string(T0* a1);
- void r306w_put_character(char a1);
- T0* r829small_eiffel_directory(T829* C);
- void r829make(T829* C);
- extern T0*oBC364help_file_name;
- void r829add_directory(T829* C,T0* a1,T0* a2);
- extern T670 oBC1file_tools;
- T0* r829get_environment_variable(T829* C,T0* a1);
- void r829print_help(T829* C,T0* a1);
- extern int fBC1command_arguments;
- extern T0*oBC1command_arguments;
- T0* r829command_arguments(void);
- T0* r829system_name(T829* C);
- extern T0*oBC364small_eiffel;
- int r829file_exists(T0* a1);
- T0* r829argument(int a1);
- extern int se_argc;
- extern char**se_argv;
- extern T7*ms1_829;
- extern T7*ms2_829;
- extern T7*ms2_364;
- extern T7*ms39_364;
- extern T7*ms3_364;
- extern T7*ms10_604;
- extern T7*ms137_470;
- extern T7*ms13_604;
- extern T7*ms14_604;
- extern T7*ms15_604;
- extern T7*ms16_604;
- extern T7*ms17_604;
- extern T7*ms25_364;
- extern T7*ms11_604;
- extern T7*ms12_604;
- extern T7*ms62_604;
- extern T7*ms2_604;
- extern T7*ms3_604;
- extern T7*ms126_470;
- extern T7*ms3_306;
- extern T7*ms4_306;
- extern T7*ms20_364;
- extern T7*ms127_470;
- extern T7*ms21_364;
- extern T7*ms1_364;
- extern T7*ms24_364;
- extern T7*ms242_470;
- extern T7*ms22_364;
- extern T7*ms23_364;
- extern T7*ms13_364;
- extern T7*ms14_364;
- extern T7*ms15_364;
- extern T7*ms16_364;
- extern T7*ms17_364;
- extern T7*ms18_364;
- extern T7*ms19_364;
- extern T7*ms4_604;
- extern T7*ms5_604;
- extern T7*ms63_604;
- extern T7*ms121_470;
- extern T7*ms64_604;
- extern T7*ms66_604;
- extern T7*ms67_604;
- extern T7*ms65_604;
- extern T7*ms3_829;
- void se_msi1(void);
- void se_msi2(void);
- void se_msi3(void);
- T7*se_ms(int c,char*e);
- T7*e2s(char*e);
- char*s2e(T7*s);
- void*se_ma52(int argc,...);
- void rsp(void);
- void sigrsp(int sig);
- void se_initialize(void);
-
-